home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / K-L / LOAN.cpt / LOAN / card_3331.txt < prev    next >
Text File  |  1990-12-13  |  1KB  |  61 lines
  1. -- card: 3331 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 2627
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: A003
  11. -- rect: left=200 top=89 right=111 bottom=300
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: UpDate
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   put the short date into background field 11
  23.  
  24.  
  25.  
  26.   put the seconds +(((60*60)*24)*45) into it
  27.   convert it to short date
  28.   put it into background field 12
  29.  
  30.  
  31. end mouseUp
  32.  
  33.  
  34.  
  35. -- part 2 (button)
  36. -- low flags: 00
  37. -- high flags: 0000
  38. -- rect: left=70 top=17 right=45 bottom=108
  39. -- title width / last selected line: 0
  40. -- icon id / first selected line: 19678 / 19678
  41. -- text alignment: 1
  42. -- font id: 0
  43. -- text size: 12
  44. -- style flags: 0
  45. -- line height: 16
  46. -- part name: New Button
  47. ----- HyperTalk script -----
  48. on mouseUp
  49.   go to card id 2255
  50. end mouseUp
  51.  
  52.  
  53.  
  54.  
  55. -- part contents for background part 31
  56. ----- text -----
  57. 11/27/87
  58.  
  59. -- part contents for background part 34
  60. ----- text -----
  61. 1/11/88